home *** CD-ROM | disk | FTP | other *** search
/ You're the Director / You're The Director.iso / mac / MACF / MGER.DIR / 00366_Script_366 < prev   
Text File  |  1995-10-10  |  650b  |  30 lines

  1. on enterFrame
  2.   global gCurrentSprite
  3.   
  4.   --  set the keyDownScript to "if the key = RETURN then set the editableText of ¼
  5.   --  sprite gCurrentSprite to FALSE"
  6.   set the keyDownScript to "if the key = RETURN then RunOff"
  7.   
  8.   if length(field "name")>15 then
  9.     set gCurrentSprite to 3
  10.     RunOff
  11.   end if
  12.   if length(field "movie")>15 then
  13.     set gCurrentSprite to 4
  14.     RunOff
  15.   end if
  16. end
  17.  
  18. on mouseDown
  19.   global gCurrentSprite
  20.   if rollOver(3) then
  21.     set gCurrentSprite = 3
  22.   else if rollOver(4) then
  23.     set gCurrentSprite = 4
  24.   end if  
  25. end
  26.  
  27. on exitFrame
  28.   global gStart,gCurrentSprite
  29.   set gStart = TRUE
  30. end